﻿Imports Microsoft.VisualBasic
Imports System.Configuration.ConfigurationManager
Imports System.Data
Imports System.Data.SqlClient

Public Class Operador
    'instancia de conexion
    Dim cn As New SqlConnection(ConnectionStrings("cn").ConnectionString)

    'funcion q liste los operadores
    Public Function Listado() As DataTable
        'definir consulta
        Dim da As New SqlDataAdapter("select * from tb_operador", cn)
        Dim tb As New DataTable
        da.Fill(tb)
        Return tb
    End Function
End Class
